home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ShareWare OnLine 2
/
ShareWare OnLine Volume 2 (CMS Software)(1993).iso
/
util1
/
ben311.zip
/
!BENDEMO.EXE
/
BENDEMO.DA2
< prev
next >
Wrap
Text File
|
1993-05-15
|
1KB
|
29 lines
;Data file to be used with BENDEMO.BAT.
;This file draws the "Music Work Shop" background
Cls Red
;Draws "The Entertainer" Box
GrowFilledBox 5 5 25 17 White Blue 2
Locate 8 7 / Write Yellow Blue The~Entertainer
Locate 9 15 / Write White Blue Approx:~1:30
;Draws "The Invention" Box
GrowFilledBox 30 5 50 17 Blue Cyan 2
Locate 34 7 / Write Yellow Cyan Invention~#14
Locate 33 8 / Write Yellow Cyan in~B~flat~major
Locate 34 12 / Write Black Cyan By~J.S.~Bach
Locate 34 15 / Write White Cyan Approx:~1:30
;Draws "The Beep" Box
GrowFilledBox 55 5 75 17 Black LightGray 2
Locate 60 7 / Write Yellow LightGray The~"BEEP"
Locate 59 12 / Write Black LightGray By~Anonymous
Locate 59 15 / Write Blue LightGray Approx:~0:02
;Draws key-pressing instructions
Locate 1 1 / WriteC White Red The~BENDEMO~Music~Work~Shop
Locate 13 20 / Write Yellow Red Press~[E]~to~listen~to~"The~Entertainer"
Locate 13 21 / Write Yellow Red Press~[I]~to~listen~to~"Invention~#14~in~B~flat~major"
Locate 13 22 / Write Yellow Red Press~[B]~to~listen~to~"The~Beep"
Locate 13 24 / Write White Red Press~[Q]~to~quit